﻿Public Class FormPrincipal
    Private Conex As Conexion


    Private Sub SalirToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SalirToolStripMenuItem.Click
        Me.Close()
    End Sub
    
    Sub ParámetrosGlobalesToolStripMenuItemClick(ByVal sender As Object, ByVal e As EventArgs) Handles ParámetrosGlobalesToolStripMenuItem.Click
        Dim FormulaParam As FormularioParametros = New FormularioParametros()
        FormulaParam.MdiParent = Me
        FormulaParam.Show()
    End Sub
    
    
    
    Sub AltaToolStripMenuItemClick(ByVal sender As Object, ByVal e As EventArgs) Handles AltaToolStripMenuItem.Click
        Dim FormAlta As FormularioAltaCliente = New FormularioAltaCliente()
        FormAlta.MdiParent = Me
        FormAlta.Show()

    End Sub

    Private Sub FormPrincipal_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Conex = New Conexion()
        Conex.AbrirDB()


    End Sub
End Class
